unit qah_ide;
(*$define clx *)
(*$i ah_ide.pas *)
(*@\\\0005000313000011*)
